Swimsuit Review 95/Swimsuit Review 95.iso/pc/data/swim8.dir/00036_Script_36

Text File | 1995-07-14 | 578b | 27 lines

--Quit

on mouseDown
  global MC
  put mouseCast() into MC
  repeat while stillDown() = 1
    if mouseCast() = MC then
      set the castNum of sprite 7 to MC +1
      updateStage
      next repeat
    end if
    if (mouseCast() <> MC + 1) then set the castNum of sprite 7 to MC
    updateStage
  end repeat
end

on mouseUp
  global MC
  set the castNum of sprite 7 to 41
  updateStage
  if the mouseCast = 41 or the mouseCast = 42 then
    sound stop 1
    sound playFile 1, "Click.AIF"
    Quit
  end if
end